package com.xlf.common.core.util.file;
import com.xlf.common.core.exception.file.FileNameLengthLimitExceededException;
import com.xlf.common.core.exception.file.FileSizeLimitExceededException;
import com.xlf.common.core.exception.file.InvalidExtensionException;
import com.xlf.common.core.util.FileUtil;
import com.xlf.common.core.util.StringUtils;
import org.springframework.web.multipart.MultipartFile;
import sun.misc.Cleaner;

import java.io.File;
import java.io.IOException;
import java.io.RandomAccessFile;
import java.lang.reflect.InvocationTargetException;
import java.lang.reflect.Method;
import java.nio.MappedByteBuffer;
import java.nio.channels.FileChannel;
import java.nio.file.Paths;
import java.util.Objects;

/**
 * 本地文件上传工具类,可对上传的文件进行类型，大小限制。
 * UploadConfig配置文件的上传基路径 eg: D:xx/xx
 *
 */
public class FileUploadUtils
{
    /**
     * 默认大小 50M
     */
    public static final long DEFAULT_MAX_SIZE = 50 * 1024 * 1024;

    /**
     * 默认的文件名最大长度 100
     */
    public static final int DEFAULT_FILE_NAME_LENGTH = 100;

    /**
     * 默认上传的地址
     */
    private static String defaultBaseDir = UploadConfig.getUploadPath();

    public static void setDefaultBaseDir(String defaultBaseDir)
    {
        FileUploadUtils.defaultBaseDir = defaultBaseDir;
    }

    public static String getDefaultBaseDir()
    {
        return defaultBaseDir;
    }

    /**
     * 以默认配置进行文件上传,上传到配置的路径下
     *
     * @param file 上传的文件
     * @return 文件名称
     * @throws Exception
     */
    public static final String upload(MultipartFile file) throws IOException
    {
        try
        {
            return upload(getDefaultBaseDir(), file, MimeTypeUtils.DEFAULT_ALLOWED_EXTENSION);
        }
        catch (Exception e)
        {
            throw new IOException(e.getMessage(), e);
        }
    }

    /**
     * 根据文件路径上传
     *
     * @param baseDir 相对应用的基目录
     * @param file 上传的文件
     * @return 文件名称
     * @throws IOException
     */
    public static final String upload(String baseDir, MultipartFile file) throws IOException
    {
        try
        {
            return upload(baseDir, file, MimeTypeUtils.DEFAULT_ALLOWED_EXTENSION);
        }
        catch (Exception e)
        {
            //捕获全部异常
            throw new IOException(e.getMessage(), e);
        }
    }

    /**
     * 文件上传
     *
     * @param baseDir 相对应用的基目录
     * @param file 上传的文件
     * @param allowedExtension 上传文件类型
     * @return 返回上传成功的文件名
     * @throws FileSizeLimitExceededException 如果超出最大大小
     * @throws FileNameLengthLimitExceededException 文件名太长
     * @throws IOException 比如读写文件出错时
     * @throws InvalidExtensionException 文件校验异常
     */
    public static final String upload(String baseDir, MultipartFile file, String[] allowedExtension)
            throws FileSizeLimitExceededException, IOException, FileNameLengthLimitExceededException,
            InvalidExtensionException
    {
        //file是否允许被下载。 对文件名长度进行限制。
        fileNameAllowed(file);

        //file是否允许被下载。 对大小进行限制。
        fileSizeAllowed(file);

        //file是否允许被下载。 对类型进行限制。 allowedExtension：允许下载的类型集合
        assertAllowed(file, allowedExtension);

        //拿到编码后的文件名（含后缀) fileName eg: md5.mp3; eg: md5
        String fileName = extractFilename(file);

        //判断文件是否存在，不存在就创建文件夹。最终返回完整的文件对象路径。
        String absPath = getAbsoluteFile(baseDir, fileName).getAbsolutePath();

        //上传
        file.transferTo(Paths.get(absPath));
        //返回储存路径,/xxxx/xxxx/xxx.jpg
        return getPathFileName(baseDir,fileName);
    }

    /**
     * 对文件的文件名大小进行限制
     * @param file
     */
    private static void fileNameAllowed(MultipartFile file) {
        //文件名长度检测
        int fileNamelength = Objects.requireNonNull(file.getOriginalFilename()).length();
        if (fileNamelength > FileUploadUtils.DEFAULT_FILE_NAME_LENGTH)
        {
            throw new FileNameLengthLimitExceededException(FileUploadUtils.DEFAULT_FILE_NAME_LENGTH);
        }
    }


    /**
     * md5编码文件名，eg: md5.jpg ,eg md5
     */
    public static final String extractFilename(MultipartFile file) throws IOException {
        //拿到后缀
        String extension = getExtension(file);
        //拿到md5
        String md5 = FileUtil.getMd5(file.getInputStream());

        if(StringUtils.isEmpty(extension))
            return md5;
        else
            return md5 + '.' + extension;
    }

    /**
     * 判断文件是否存在，如果不存在就判断文件在的文件夹是否存在，不存在就创建。返回目标文件
     * @param uploadDir
     * @param fileName
     * @return
     * @throws IOException
     */
    public static final File getAbsoluteFile(String uploadDir, String fileName) throws IOException
    {
        File desc = new File(uploadDir + File.separator + fileName);

        if (!desc.exists())
        {
            if (!desc.getParentFile().exists())
            {
                desc.getParentFile().mkdirs();
            }
        }
        return desc;
    }

    /**
     *
     * @param uploadDir 从根目录开始的文件夹路径
     * @param fileName eg: md5.jpg, md5
     * @return 文件储存路径 不包括域名
     * @throws IOException
     */
    public static final String getPathFileName(String uploadDir, String fileName) throws IOException
    {

        int dirLastIndex = UploadConfig.getLocalPath().length() + 1;

        String currentDir = StringUtils.substring(uploadDir, dirLastIndex);

        //上面操作是截取掉localPath eg: localPath D:/test  uploadDir D:/test/upload =>  currentDir = upload
        //丢给前端访问的路径  mvc映射的路径下 拼接文件夹和文件名称。
        System.out.println(UploadConfig.getLocalUrl());
        return  File.separator + currentDir +  File.separator + fileName;
    }

    /**
     *
     * @param
     * @param filePath 文件路径
     * @return 前端访问路径
     * @throws IOException
     */
    public static final String getFileUrl(String filePath)
    {
        return UploadConfig.getLocalUrl() + filePath;
    }


    /**
     * 文件大小校验，使用默认值
     * @param file
     * @return
     */
    public static final void fileSizeAllowed(MultipartFile file){
        //超出最大值
       fileSizeAllowed(file,DEFAULT_MAX_SIZE);
    }

    /**
     * 文件大小校验
     * @param file
     * @param MaxSize 允许的最大值
     */
    public static final void fileSizeAllowed(MultipartFile file,long MaxSize){
        //超出最大值
        long size = file.getSize();
        if (size > MaxSize)
        {
            throw new FileSizeLimitExceededException(DEFAULT_MAX_SIZE / 1024 / 1024);
        }
    }


    /**
     * 校验该文件类型是否可上传,使用默认值
     * @param file 上传的文件
     * @return
     * @throws FileSizeLimitExceededException 如果超出最大大小
     * @throws InvalidExtensionException
     */
    public static final void assertAllowed(MultipartFile file)
            throws FileSizeLimitExceededException, InvalidExtensionException
    {
        assertAllowed(file, MimeTypeUtils.DEFAULT_ALLOWED_EXTENSION);
    }


    /**
     * 校验该文件类型是否可上传
     * allowedExtension 可上传的文件类型。
     * @param file 上传的文件
     * @return
     * @throws FileSizeLimitExceededException 如果超出最大大小
     * @throws InvalidExtensionException
     */
    public static final void assertAllowed(MultipartFile file, String[] allowedExtension)
            throws FileSizeLimitExceededException, InvalidExtensionException
    {

        //拿到源文件名
        String fileName = file.getOriginalFilename();
        //拿到扩展名
        String extension = getExtension(file);

        //根据扩展名判断上传的文件类型是否在allowedExtension中
        if (allowedExtension != null && !isAllowedExtension(extension, allowedExtension))
        {
            if (allowedExtension == MimeTypeUtils.IMAGE_EXTENSION)
            {
                throw new InvalidExtensionException.InvalidImageExtensionException(allowedExtension, extension,
                        fileName);
            }
            else if (allowedExtension == MimeTypeUtils.FLASH_EXTENSION)
            {
                throw new InvalidExtensionException.InvalidFlashExtensionException(allowedExtension, extension,
                        fileName);
            }
            else if (allowedExtension == MimeTypeUtils.MEDIA_EXTENSION)
            {
                throw new InvalidExtensionException.InvalidMediaExtensionException(allowedExtension, extension,
                        fileName);
            }
            else if (allowedExtension == MimeTypeUtils.VIDEO_EXTENSION)
            {
                throw new InvalidExtensionException.InvalidVideoExtensionException(allowedExtension, extension,
                        fileName);
            }
            else
            {
                throw new InvalidExtensionException(allowedExtension, extension, fileName);
            }
        }
    }

    /**
     * 判断MIME类型是否是允许的MIME类型
     *
     * @param extension
     * @param allowedExtension
     * @return
     */
    public static final boolean isAllowedExtension(String extension, String[] allowedExtension)
    {
        for (String str : allowedExtension)
        {
            if (str.equalsIgnoreCase(extension))
            {
                return true;
            }
        }
        return false;
    }

    /**
     * 获取文件名的后缀,不带‘.'
     *
     * @param file 表单文件
     * @return 后缀名
     */
    public static final String getExtension(MultipartFile file)
    {
        String extension = FileUtil.getExtNameTo(file.getOriginalFilename());

        //得不到扩展名就推导
        if (StringUtils.isEmpty(extension))
        {
            //根据请求头的 ContentType字段推导文件的后缀，推到不出来返回""
            extension = MimeTypeUtils.getExtension(Objects.requireNonNull(file.getContentType()));
        }
        return extension;
    }



    /**
     * 从指定位置写入数据
     * @param parentDir 基文件夹路径 不要加’/‘
     * @param tempFileName 文件名 不要加’/‘
     * @param file 文件
     * @param position 从该位置写进去
     * @param totalSize 打开的文件总大小，不能小于position
     * @throws IOException
     */
    public static void randomBuffWrite(String parentDir,String tempFileName, MultipartFile file, long position,long totalSize) throws IOException {

        File tmpFile = getAbsoluteFile(parentDir, tempFileName);

        //创建io随机读写类
        RandomAccessFile tempRaf = new RandomAccessFile(tmpFile, "rw");
        if (tempRaf.length() == 0) {
            tempRaf.setLength(totalSize);
        }

        //创建管道
        FileChannel fc = tempRaf.getChannel();
        MappedByteBuffer map = fc.map(FileChannel.MapMode.READ_WRITE, position, file.getSize());
        map.put(file.getBytes());
        //关闭管道
        clean(map);
        fc.close();
        tempRaf.close();
    }

    /**
     * 从指定位置写入数据
     * @param parentDir 基文件夹路径 不要加’/‘
     * @param tempFileName 文件名 不要加’/‘
     * @param file 文件
     * @param position 从该位置写进去
     * @param totalSize 打开的文件总大小，不能小于position
     * @throws IOException
     */
    public static void randomWrite(String parentDir,String tempFileName, MultipartFile file, long position,long totalSize) throws IOException {

        randomWrite(parentDir,tempFileName,file.getBytes(),position,totalSize);
    }

    /**
     * 从指定位置写入数据
     * @param parentDir 基文件夹路径 不要加’/‘
     * @param tempFileName 文件名 不要加’/‘
     * @param b
     * @param position 从该位置写进去
     * @param totalSize 打开的文件总大小，不能小于position
     * @throws IOException
     */
    public static void randomWrite(String parentDir,String tempFileName, byte[] b, long position,long totalSize) throws IOException {

        File tmpFile = getAbsoluteFile(parentDir, tempFileName);

        //创建io随机读写类
        RandomAccessFile tempRaf = new RandomAccessFile(tmpFile, "rw");
        if (tempRaf.length() == 0) {
            tempRaf.setLength(totalSize);
        }
        tempRaf.seek(position);
        tempRaf.write(b);
        tempRaf.close();
    }
    /**
     * 清空管道
     * @param map
     */
    private static void clean(MappedByteBuffer map) {
        try {
            Method getCleanerMethod = map.getClass().getMethod("cleaner");
            Cleaner.create(map, null);
            getCleanerMethod.setAccessible(true);
            Cleaner cleaner = (Cleaner) getCleanerMethod.invoke(map);
            cleaner.clean();
        } catch (NoSuchMethodException | IllegalAccessException | InvocationTargetException e) {
            e.printStackTrace();
        }
    }
}
